function figout = zambia_figNumTr(sd_F1vec,mP,mPComp,mPN,mW,mPProf0,mProf0_C,sdf1)

%Graphs with baseline values of welfare parameters
set(0,'DefaultAxesFontName', 'Garamond')
set(0,'DefaultAxesFontSize', 24)

% Change default text fonts.
set(0,'DefaultTextFontname', 'Garamond')
set(0,'DefaultTextFontSize', 24)

%%2 4 1 3 %Do not need to divide column 2/4 by part because all part

figout = figure('NumberTitle','off','Position',[0, 0, 800, 600]);
set(figout, 'PaperOrientation', 'landscape','Color', 'w')

plot(sd_F1vec',mPN(:,3),'--ok',sd_F1vec',mPN(:,4),'k-'),...
    axis([0 500 5 50]),ylabel({'Average follow-through','(trees per farmer)'}),xlabel('Uncertainty (standard deviation of F1)')
    legend('Subsidy (A) = 0 ','Subsidy (A) = 12 ','Location','northeast');
hold on
line([sdf1,sdf1],[5.01,50],'LineStyle',':','Color',[0.8,0.8,0.8])
hold off

end
